! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
! 
! Sparse Jacobian Data Structures File
! 
! Generated by KPP-2.2.4_gc symbolic chemistry Kinetics PreProcessor
!       (http://www.cs.vt.edu/~asandu/Software/KPP)
! KPP is distributed under GPL, the general public licence
!       (http://www.gnu.org/copyleft/gpl.html)
! (C) 1995-1997, V. Damian & A. Sandu, CGRER, Univ. Iowa
! (C) 1997-2005, A. Sandu, Michigan Tech, Virginia Tech
!     With important contributions from:
!        M. Damian, Villanova University, USA
!        R. Sander, Max-Planck Institute for Chemistry, Mainz, Germany
! 
! File                 : gckpp_JacobianSP.f90
! Time                 : Mon Jan 11 14:22:52 2021
! Working directory    : /n/home08/kbates/GC/Code.12.3.0_new3_arom/KPP/Tropchem
! Equation file        : gckpp.kpp
! Output root filename : gckpp
! 
! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



MODULE gckpp_JacobianSP

  PUBLIC
  SAVE


! Sparse Jacobian Data


  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_0 = (/ &
       1,  2,  3,  4,  4,  4,  4,  4,  5,  5,  5,  5, & ! index 1 - 12
       5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5, & ! index 13 - 24
       5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5, & ! index 25 - 36
       5,  5,  5,  5,  5,  6,  6,  6,  7,  7,  7,  7, & ! index 37 - 48
       7,  7,  7,  7,  8,  8,  8,  8,  8,  8,  8,  8, & ! index 49 - 60
       9,  9, 10, 10, 10, 10, 10, 10, 10, 10, 10, 11, & ! index 61 - 72
      11, 11, 12, 12, 12, 13, 13, 14, 14, 14, 14, 14, & ! index 73 - 84
      15, 15, 15, 16, 16, 17, 17, 17, 18, 18, 18, 18, & ! index 85 - 96
      18, 18, 18, 18, 18, 18, 19, 19, 20, 20, 21, 21, & ! index 97 - 108
      22, 22, 22, 22, 23, 23, 24, 24, 24, 25, 25, 26, & ! index 109 - 120
      26, 26, 27, 27, 27, 28, 28, 28, 28, 28, 28, 28, & ! index 121 - 132
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 133 - 144
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 145 - 156
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 157 - 168
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 169 - 180
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 181 - 192
      28, 28, 28, 28, 28, 28, 29, 29, 29, 29, 29, 29, & ! index 193 - 204
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 205 - 216
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 217 - 228
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 229 - 240
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 241 - 252
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 253 - 264
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 30, 30, & ! index 265 - 276
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 277 - 288
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 289 - 300
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 301 - 312
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 313 - 324
      30, 30, 30, 30, 30, 30, 31, 31, 31, 31, 31, 31, & ! index 325 - 336
      31, 31, 31, 31, 32, 32, 32, 32, 32, 32, 32, 32, & ! index 337 - 348
      32, 32, 33, 33, 33, 34, 34, 34, 34, 34, 34, 34 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_1 = (/ &
      34, 34, 34, 34, 34, 34, 34, 35, 35, 35, 36, 36, & ! index 361 - 372
      36, 37, 37, 37, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 373 - 384
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 385 - 396
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 397 - 408
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 409 - 420
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 421 - 432
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 433 - 444
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 445 - 456
      39, 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, 39, & ! index 457 - 468
      39, 39, 39, 39, 39, 39, 40, 40, 40, 40, 40, 40, & ! index 469 - 480
      40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, & ! index 481 - 492
      40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, & ! index 493 - 504
      40, 40, 40, 40, 40, 41, 41, 41, 41, 41, 41, 41, & ! index 505 - 516
      41, 41, 41, 41, 41, 41, 41, 41, 41, 41, 41, 41, & ! index 517 - 528
      41, 41, 41, 41, 41, 41, 41, 41, 42, 42, 42, 42, & ! index 529 - 540
      43, 43, 43, 44, 44, 44, 45, 45, 45, 45, 46, 46, & ! index 541 - 552
      46, 47, 47, 47, 48, 48, 48, 48, 49, 49, 49, 49, & ! index 553 - 564
      49, 49, 49, 50, 50, 50, 50, 50, 50, 50, 50, 50, & ! index 565 - 576
      50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, & ! index 577 - 588
      50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, & ! index 589 - 600
      50, 50, 50, 50, 50, 51, 51, 51, 51, 51, 51, 51, & ! index 601 - 612
      51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, & ! index 613 - 624
      51, 51, 51, 51, 51, 51, 51, 52, 52, 52, 52, 52, & ! index 625 - 636
      52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, & ! index 637 - 648
      52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, & ! index 649 - 660
      52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 53, 53, & ! index 661 - 672
      54, 54, 54, 54, 54, 55, 55, 55, 55, 55, 55, 55, & ! index 673 - 684
      55, 55, 55, 56, 56, 56, 56, 56, 56, 56, 56, 56, & ! index 685 - 696
      56, 56, 56, 56, 56, 56, 56, 56, 56, 57, 57, 57, & ! index 697 - 708
      57, 57, 57, 57, 57, 57, 57, 57, 57, 57, 57, 57 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_2 = (/ &
      57, 57, 57, 57, 57, 57, 57, 57, 57, 57, 58, 58, & ! index 721 - 732
      58, 58, 59, 59, 59, 59, 60, 60, 60, 61, 61, 61, & ! index 733 - 744
      61, 62, 62, 62, 63, 63, 63, 64, 64, 64, 64, 64, & ! index 745 - 756
      65, 65, 65, 65, 66, 66, 66, 67, 67, 67, 67, 67, & ! index 757 - 768
      67, 68, 68, 68, 68, 68, 68, 69, 69, 69, 69, 70, & ! index 769 - 780
      70, 70, 71, 71, 71, 72, 72, 72, 73, 73, 73, 74, & ! index 781 - 792
      74, 74, 74, 74, 74, 74, 74, 74, 74, 74, 75, 75, & ! index 793 - 804
      75, 75, 76, 76, 76, 77, 77, 77, 78, 78, 78, 79, & ! index 805 - 816
      79, 79, 80, 80, 81, 81, 81, 82, 82, 82, 83, 83, & ! index 817 - 828
      83, 84, 84, 84, 85, 85, 85, 86, 86, 86, 87, 87, & ! index 829 - 840
      88, 88, 89, 89, 89, 89, 90, 90, 91, 91, 91, 91, & ! index 841 - 852
      92, 92, 93, 93, 94, 94, 94, 95, 95, 95, 96, 96, & ! index 853 - 864
      96, 97, 97, 98, 98, 98, 99, 99,100,100,100,100, & ! index 865 - 876
     101,101,101,102,102,102,102,103,103,103,103,104, & ! index 877 - 888
     104,105,105,105,105,105,105,105,105,105,105,106, & ! index 889 - 900
     106,106,106,106,107,107,107,107,107,108,108,108, & ! index 901 - 912
     108,109,109,109,109,110,110,110,110,111,111,111, & ! index 913 - 924
     112,112,113,113,114,114,114,114,114,114,115,115, & ! index 925 - 936
     115,116,116,116,116,116,116,117,117,117,118,118, & ! index 937 - 948
     118,119,119,119,120,120,120,120,120,120,120,121, & ! index 949 - 960
     121,121,121,122,122,122,122,123,123,123,123,124, & ! index 961 - 972
     124,124,125,125,125,125,126,126,126,127,127,127, & ! index 973 - 984
     128,128,128,128,129,129,129,129,130,130,130,130, & ! index 985 - 996
     130,131,131,131,131,131,131,132,132,132,132,132, & ! index 997 - 1008
     132,132,133,133,133,133,133,133,133,134,134,134, & ! index 1009 - 1020
     134,134,134,134,135,135,135,135,135,136,136,136, & ! index 1021 - 1032
     136,136,137,137,137,137,137,138,138,138,138,139, & ! index 1033 - 1044
     139,139,139,140,140,140,140,141,141,141,141,141, & ! index 1045 - 1056
     142,142,142,142,142,142,143,143,143,143,143,144, & ! index 1057 - 1068
     144,144,144,144,145,145,145,145,146,146,146,146 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_3 = (/ &
     146,147,147,147,147,147,147,147,147,147,147,147, & ! index 1081 - 1092
     148,148,148,148,148,149,149,149,150,150,150,150, & ! index 1093 - 1104
     151,151,151,151,152,152,152,152,153,153,153,153, & ! index 1105 - 1116
     154,154,154,154,155,155,155,155,155,156,156,156, & ! index 1117 - 1128
     156,156,156,156,156,156,157,157,157,157,157,157, & ! index 1129 - 1140
     157,157,157,157,158,158,158,158,158,159,159,159, & ! index 1141 - 1152
     159,159,160,160,160,160,160,160,161,161,161,161, & ! index 1153 - 1164
     162,162,162,162,162,162,163,163,163,163,163,163, & ! index 1165 - 1176
     163,164,164,164,164,164,164,165,165,165,165,166, & ! index 1177 - 1188
     166,166,166,167,167,167,167,167,168,168,168,168, & ! index 1189 - 1200
     168,169,169,169,169,169,170,170,170,170,170,170, & ! index 1201 - 1212
     171,171,171,171,171,171,171,172,172,172,172,172, & ! index 1213 - 1224
     172,172,173,173,173,173,173,173,173,174,174,174, & ! index 1225 - 1236
     174,174,175,175,175,175,175,175,176,176,176,176, & ! index 1237 - 1248
     176,177,177,177,177,177,177,177,177,177,177,177, & ! index 1249 - 1260
     177,177,177,178,178,178,178,178,178,178,178,178, & ! index 1261 - 1272
     178,178,179,179,179,179,179,179,179,180,180,180, & ! index 1273 - 1284
     180,181,181,181,181,181,182,182,182,182,183,183, & ! index 1285 - 1296
     183,183,183,183,184,184,184,184,184,184,184,185, & ! index 1297 - 1308
     185,185,185,185,185,185,185,186,186,186,186,186, & ! index 1309 - 1320
     187,187,187,187,187,187,187,188,188,188,188,188, & ! index 1321 - 1332
     188,189,189,189,189,190,190,190,190,190,190,190, & ! index 1333 - 1344
     191,191,191,191,191,191,191,191,191,192,192,192, & ! index 1345 - 1356
     192,192,192,192,192,192,192,193,193,193,193,193, & ! index 1357 - 1368
     193,193,193,194,194,194,194,194,194,194,194,194, & ! index 1369 - 1380
     194,195,195,195,195,195,195,195,196,196,196,196, & ! index 1381 - 1392
     196,196,196,196,196,196,196,196,196,196,196,196, & ! index 1393 - 1404
     196,196,197,197,197,197,197,197,197,197,197,197, & ! index 1405 - 1416
     198,198,198,198,198,198,198,199,199,199,199,199, & ! index 1417 - 1428
     199,199,199,199,199,200,200,200,200,200,200,200 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_4 = (/ &
     200,200,200,200,200,200,200,201,201,201,201,201, & ! index 1441 - 1452
     202,202,202,202,202,202,202,202,202,202,202,202, & ! index 1453 - 1464
     202,203,203,203,203,203,203,203,203,203,203,203, & ! index 1465 - 1476
     203,203,203,203,203,203,203,203,203,203,203,203, & ! index 1477 - 1488
     203,203,204,204,204,204,204,204,204,204,204,204, & ! index 1489 - 1500
     204,204,204,204,204,204,204,204,204,204,204,204, & ! index 1501 - 1512
     204,204,205,205,205,205,205,205,205,205,205,205, & ! index 1513 - 1524
     205,205,205,205,206,206,206,206,206,206,206,206, & ! index 1525 - 1536
     206,206,206,206,206,206,206,206,206,206,207,207, & ! index 1537 - 1548
     207,207,207,207,207,207,207,208,208,208,208,208, & ! index 1549 - 1560
     208,208,208,208,208,208,208,209,209,209,209,209, & ! index 1561 - 1572
     209,209,209,209,210,210,210,210,210,210,210,210, & ! index 1573 - 1584
     210,210,211,211,211,211,211,211,211,212,212,212, & ! index 1585 - 1596
     212,212,212,212,212,212,212,212,212,212,212,213, & ! index 1597 - 1608
     213,213,213,213,213,213,213,213,213,213,213,213, & ! index 1609 - 1620
     213,213,213,213,213,213,213,213,213,213,213,213, & ! index 1621 - 1632
     213,213,213,214,214,214,214,214,214,214,214,214, & ! index 1633 - 1644
     214,214,214,215,215,215,215,215,215,215,216,216, & ! index 1645 - 1656
     216,216,216,216,216,216,216,216,216,216,216,216, & ! index 1657 - 1668
     216,216,216,216,216,216,216,217,217,217,217,217, & ! index 1669 - 1680
     217,217,218,218,218,218,218,218,218,218,218,218, & ! index 1681 - 1692
     219,219,219,219,219,220,220,220,220,220,220,220, & ! index 1693 - 1704
     220,220,220,220,220,221,221,221,221,221,221,221, & ! index 1705 - 1716
     221,221,221,221,222,222,222,222,222,222,222,222, & ! index 1717 - 1728
     222,222,223,223,223,223,223,223,223,223,223,223, & ! index 1729 - 1740
     223,224,224,224,224,224,224,224,224,224,224,224, & ! index 1741 - 1752
     224,224,225,225,225,225,225,225,225,225,225,225, & ! index 1753 - 1764
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 1765 - 1776
     225,225,226,226,226,226,226,226,226,226,226,226, & ! index 1777 - 1788
     226,226,226,226,227,227,227,227,227,227,227,227 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_5 = (/ &
     227,227,227,227,227,227,227,227,228,228,228,228, & ! index 1801 - 1812
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 1813 - 1824
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 1825 - 1836
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 1837 - 1848
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 1849 - 1860
     228,228,228,228,228,228,228,228,228,228,228,228, & ! index 1861 - 1872
     228,228,229,229,229,229,229,229,229,229,229,229, & ! index 1873 - 1884
     229,229,229,230,230,230,230,230,230,230,230,230, & ! index 1885 - 1896
     231,231,231,231,231,231,231,231,231,231,231,231, & ! index 1897 - 1908
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 1909 - 1920
     233,233,233,233,233,233,233,233,233,234,234,234, & ! index 1921 - 1932
     234,234,234,234,234,234,234,234,234,234,234,235, & ! index 1933 - 1944
     235,235,235,235,235,235,235,235,235,236,236,236, & ! index 1945 - 1956
     236,236,236,236,236,236,236,236,236,236,236,237, & ! index 1957 - 1968
     237,237,237,237,237,237,237,237,237,237,237,237, & ! index 1969 - 1980
     237,237,237,237,237,237,237,237,237,237,237,237, & ! index 1981 - 1992
     237,237,237,237,237,237,237,237,237,237,237,237, & ! index 1993 - 2004
     237,237,237,237,238,238,238,238,238,238,238,239, & ! index 2005 - 2016
     239,239,239,239,239,239,239,239,239,239,239,239, & ! index 2017 - 2028
     239,239,239,239,239,239,239,239,239,239,240,240, & ! index 2029 - 2040
     240,240,240,240,240,240,240,240,240,240,240,240, & ! index 2041 - 2052
     240,240,240,240,240,241,241,241,241,241,241,241, & ! index 2053 - 2064
     241,241,241,241,241,242,242,242,242,242,242,242, & ! index 2065 - 2076
     242,242,242,242,243,243,243,243,243,243,243,243, & ! index 2077 - 2088
     243,243,243,243,243,243,243,243,243,243,243,243, & ! index 2089 - 2100
     243,243,243,243,243,243,243,243,243,243,243,243, & ! index 2101 - 2112
     244,244,244,244,244,244,244,244,244,244,244,244, & ! index 2113 - 2124
     245,245,245,245,245,245,245,245,245,245,245,245, & ! index 2125 - 2136
     245,246,246,246,246,246,246,246,246,246,246,246, & ! index 2137 - 2148
     246,246,246,246,246,246,246,246,246,246,246,246 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_6 = (/ &
     246,246,246,246,246,246,246,246,246,246,246,246, & ! index 2161 - 2172
     246,246,246,246,246,246,246,246,246,246,246,246, & ! index 2173 - 2184
     246,246,246,247,247,247,247,247,247,247,247,248, & ! index 2185 - 2196
     248,248,248,248,248,248,248,248,248,248,248,248, & ! index 2197 - 2208
     248,248,248,248,249,249,249,249,249,249,249,249, & ! index 2209 - 2220
     249,249,249,249,249,249,249,250,250,250,250,250, & ! index 2221 - 2232
     250,250,250,250,250,250,250,250,250,250,250,250, & ! index 2233 - 2244
     250,250,250,250,250,250,250,251,251,251,251,251, & ! index 2245 - 2256
     251,251,251,251,251,251,251,251,251,251,252,252, & ! index 2257 - 2268
     252,252,252,252,252,252,252,252,252,252,252,253, & ! index 2269 - 2280
     253,253,253,253,253,253,253,253,253,253,253,253, & ! index 2281 - 2292
     253,253,253,254,254,254,254,254,254,254,254,254, & ! index 2293 - 2304
     254,254,254,254,254,255,255,255,255,255,255,255, & ! index 2305 - 2316
     255,255,255,255,255,256,256,256,256,256,256,256, & ! index 2317 - 2328
     256,256,256,256,256,256,256,256,256,256,256,256, & ! index 2329 - 2340
     256,256,256,256,256,256,256,256,256,256,256,256, & ! index 2341 - 2352
     256,256,256,256,256,256,256,256,256,256,256,256, & ! index 2353 - 2364
     256,256,256,256,256,256,256,256,256,256,256,256, & ! index 2365 - 2376
     256,256,257,257,257,257,257,257,257,257,257,257, & ! index 2377 - 2388
     257,257,257,257,257,257,257,257,257,257,257,258, & ! index 2389 - 2400
     258,258,258,258,258,258,258,258,258,258,258,258, & ! index 2401 - 2412
     258,258,258,258,258,258,258,258,258,258,258,259, & ! index 2413 - 2424
     259,259,259,259,259,259,259,259,259,259,259,259, & ! index 2425 - 2436
     259,259,259,259,259,259,259,259,259,259,259,259, & ! index 2437 - 2448
     259,259,259,259,259,259,259,259,259,259,259,259, & ! index 2449 - 2460
     259,259,259,259,259,259,259,259,259,259,259,259, & ! index 2461 - 2472
     259,259,259,259,259,259,259,259,259,259,259,259, & ! index 2473 - 2484
     259,259,259,259,259,260,260,260,260,260,260,260, & ! index 2485 - 2496
     260,260,260,260,260,260,260,260,260,260,260,260, & ! index 2497 - 2508
     260,260,260,261,261,261,261,261,261,261,261,261 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_7 = (/ &
     261,261,261,261,261,261,261,261,261,261,261,261, & ! index 2521 - 2532
     261,261,261,261,261,261,261,261,261,261,261,261, & ! index 2533 - 2544
     261,261,261,261,261,261,261,261,261,261,261,261, & ! index 2545 - 2556
     261,261,261,261,261,261,261,261,261,261,261,261, & ! index 2557 - 2568
     261,261,261,261,261,261,261,261,261,261,261,261, & ! index 2569 - 2580
     261,261,261,261,261,261,261,261,261,261,261,261, & ! index 2581 - 2592
     261,261,261,261,261,261,261,261,261,262,262,262, & ! index 2593 - 2604
     262,262,262,262,262,262,262,262,262,262,262,262, & ! index 2605 - 2616
     262,262,262,262,262,263,263,263,263,263,263,263, & ! index 2617 - 2628
     263,263,263,263,263,263,263,263,263,263,263,263, & ! index 2629 - 2640
     263,263,263,263,263,263,263,263,263,263,263,263, & ! index 2641 - 2652
     263,263,263,263,264,264,264,264,264,264,264,264, & ! index 2653 - 2664
     264,264,264,264,264,264,264,264,264,264,264,264, & ! index 2665 - 2676
     264,264,264,264,264,264,264,264,264,264,264,264, & ! index 2677 - 2688
     264,264,264,264,264,264,264,264,264,264,264,264, & ! index 2689 - 2700
     264,264,264,264,264,264,264,264,264,264,264,264, & ! index 2701 - 2712
     264,265,265,265,265,265,265,265,265,265,265,265, & ! index 2713 - 2724
     265,265,265,265,265,265,265,265,265,265,265,265, & ! index 2725 - 2736
     265,265,265,265,265,265,265,265,265,265,265,265, & ! index 2737 - 2748
     265,265,265,265,265,265,265,265,265,265,265,265, & ! index 2749 - 2760
     265,266,266,266,266,266,266,266,266,266,266,266, & ! index 2761 - 2772
     266,266,266,266,266,266,266,266,266,266,266,266, & ! index 2773 - 2784
     266,266,266,266,266,266,266,266,266,266,266,266, & ! index 2785 - 2796
     266,266,266,266,266,266,266,266,266,266,266,266, & ! index 2797 - 2808
     266,266,266,266,266,266,266,266,266,266,266,266, & ! index 2809 - 2820
     266,266,266,266,266,266,266,266,266,266,266,266, & ! index 2821 - 2832
     266,266,266,266,266,266,266,266,266,266,266,266, & ! index 2833 - 2844
     266,266,266,266,266,266,266,266,266,266,266,266, & ! index 2845 - 2856
     266,266,266,266,266,266,266,266,266,266,266,266, & ! index 2857 - 2868
     266,266,266,266,266,266,266,266,266,266,266,266 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_8 = (/ &
     266,266,266,266,266,266,266,267,267,267,267,267, & ! index 2881 - 2892
     267,267,267,267,267,267,267,267,267,267,267,267, & ! index 2893 - 2904
     267,267,267,267,267,267,267,267,267,267,267,267, & ! index 2905 - 2916
     267,267,267,267,267,267,267,267,267,267,267,267, & ! index 2917 - 2928
     267,267,267,267,267,267,267,267,267,267,267,267, & ! index 2929 - 2940
     267,267,267,267,267,267,267,267,267,267,267,267, & ! index 2941 - 2952
     267,267,267,267,267,267,267,267,267,267,267,267, & ! index 2953 - 2964
     267,267,268,268,268,268,268,268,268,268,268,268, & ! index 2965 - 2976
     268,268,268,268,268,268,268,268,268,268,268,268, & ! index 2977 - 2988
     268,268,268,268,268,268,268,268,268,268,268,268, & ! index 2989 - 3000
     268,268,268,268,268,268,268,268,268,268,268,268, & ! index 3001 - 3012
     268,268,268,268,268,268,268,268,268,268,268,268, & ! index 3013 - 3024
     268,268,268,268,268,268,268,268,268,268,268,268, & ! index 3025 - 3036
     268,268,268,269,269,269,269,269,269,269,269,269, & ! index 3037 - 3048
     269,269,269,269,269,269,269,269,269,269,269,269, & ! index 3049 - 3060
     269,269,269,269,269,269,269,269,269,269,269,269, & ! index 3061 - 3072
     269,269,269,269,269,270,270,270,270,270,270,270, & ! index 3073 - 3084
     270,270,270,270,270,270,270,270,270,270,270,270, & ! index 3085 - 3096
     270,270,270,270,270,270,270,270,270,270,270,270, & ! index 3097 - 3108
     270,270,270,270,270,270,270,270,270,270,270,270, & ! index 3109 - 3120
     270,270,270,270,270,270,270,270,270,270,270,270, & ! index 3121 - 3132
     270,270,270,270,270,270,270,270,270,270,270,270, & ! index 3133 - 3144
     270,270,270,271,271,271,271,271,271,271,271,271, & ! index 3145 - 3156
     271,271,271,271,271,271,271,271,271,271,271,271, & ! index 3157 - 3168
     271,272,272,272,272,272,272,272,272,272,272,272, & ! index 3169 - 3180
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 3181 - 3192
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 3193 - 3204
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 3205 - 3216
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 3217 - 3228
     272,272,272,272,272,272,272,272,272,272,272,272 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_9 = (/ &
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 3241 - 3252
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 3253 - 3264
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 3265 - 3276
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 3277 - 3288
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 3289 - 3300
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 3301 - 3312
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 3313 - 3324
     272,272,272,272,272,272,272,272,272,272,273,273, & ! index 3325 - 3336
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 3337 - 3348
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 3349 - 3360
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 3361 - 3372
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 3373 - 3384
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 3385 - 3396
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 3397 - 3408
     273,273,273,273,273,273,273,274,274,274,274,274, & ! index 3409 - 3420
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 3421 - 3432
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 3433 - 3444
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 3445 - 3456
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 3457 - 3468
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 3469 - 3480
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 3481 - 3492
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 3493 - 3504
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 3505 - 3516
     274,274,274,274,274,274,274,274,274,274,275,275, & ! index 3517 - 3528
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 3529 - 3540
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 3541 - 3552
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 3553 - 3564
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 3565 - 3576
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 3577 - 3588
     275,275,275,275,275,275,275,275,275,275,275,275 /)
  INTEGER, PARAMETER, DIMENSION(170) :: LU_IROW_10 = (/ &
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 3601 - 3612
     275,275,276,276,276,276,276,276,276,276,276,276, & ! index 3613 - 3624
     276,276,276,276,276,276,276,276,276,276,276,276, & ! index 3625 - 3636
     276,276,276,276,276,276,276,276,276,276,276,276, & ! index 3637 - 3648
     276,276,276,276,276,276,276,276,276,276,276,276, & ! index 3649 - 3660
     276,276,276,276,276,276,276,276,276,276,276,276, & ! index 3661 - 3672
     276,276,276,276,276,277,277,277,277,277,277,277, & ! index 3673 - 3684
     277,277,277,277,277,277,277,277,277,277,277,277, & ! index 3685 - 3696
     277,277,277,277,277,277,277,277,277,277,277,277, & ! index 3697 - 3708
     277,277,277,277,277,277,277,277,277,277,277,277, & ! index 3709 - 3720
     277,277,277,277,277,277,277,277,277,277,277,277, & ! index 3721 - 3732
     277,277,277,277,277,277,277,277,278,278,278,278, & ! index 3733 - 3744
     278,278,278,278,278,278,278,278,278,278,278,278, & ! index 3745 - 3756
     278,278,278,278,278,278,278,278,278,278,278,278, & ! index 3757 - 3768
     278,278 /)
  INTEGER, PARAMETER, DIMENSION(3770) :: LU_IROW = (/&
    LU_IROW_0, LU_IROW_1, LU_IROW_2, LU_IROW_3, LU_IROW_4, &
    LU_IROW_5, LU_IROW_6, LU_IROW_7, LU_IROW_8, LU_IROW_9, &
    LU_IROW_10 /)

  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_0 = (/ &
       1,  2,  3,  4, 80, 93, 98,102,  5,110,123,149, & ! index 1 - 12
     158,162,173,178,179,185,187,195,197,201,204,212, & ! index 13 - 24
     217,223,236,237,238,243,245,252,256,266,267,268, & ! index 25 - 36
     270,272,273,276,277,  6, 89,105,  7, 80, 93, 98, & ! index 37 - 48
     102,126,148,183,  8, 80, 93, 98,102,126,148,183, & ! index 49 - 60
       9, 10, 10,175,188,215,266,267,270,274,275, 11, & ! index 61 - 72
     219,272, 12,219,275, 13, 14, 14,153,165,166,272, & ! index 73 - 84
      15,127,272, 16,236, 17,210,272, 18,184,190,193, & ! index 85 - 96
     198,211,224,234,272,278, 19,205, 20,205, 21,213, & ! index 97 - 108
      22,100,106,107, 23, 24, 24,187,272, 25,246, 26, & ! index 109 - 120
     115,276, 27,115,272, 28, 89, 95,105,109,111,123, & ! index 121 - 132
     125,129,133,134,136,152,156,157,160,164,184,185, & ! index 133 - 144
     186,187,188,190,191,192,193,195,197,198,199,200, & ! index 145 - 156
     202,207,208,209,210,211,212,214,215,217,218,220, & ! index 157 - 168
     221,223,224,226,228,230,231,232,233,234,235,236, & ! index 169 - 180
     240,241,242,244,245,248,252,253,255,258,260,266, & ! index 181 - 192
     267,270,272,273,274,277, 29, 80, 93, 98,115,119, & ! index 193 - 204
     120,126,127,130,135,140,144,145,148,150,162,167, & ! index 205 - 216
     168,169,170,174,175,177,178,179,180,181,182,183, & ! index 217 - 228
     188,189,191,195,197,199,200,201,202,205,206,208, & ! index 229 - 240
     210,213,215,219,222,226,227,229,232,233,235,238, & ! index 241 - 252
     239,246,247,249,250,254,255,257,259,261,262,263, & ! index 253 - 264
     264,266,267,269,270,271,272,274,275,276, 30, 99, & ! index 265 - 276
     104,112,113,117,118,124,130,149,152,158,159,161, & ! index 277 - 288
     163,173,176,178,179,180,182,187,189,201,212,213, & ! index 289 - 300
     215,216,217,219,222,236,242,243,245,246,249,251, & ! index 301 - 312
     252,253,254,256,257,261,262,263,264,265,266,267, & ! index 313 - 324
     270,272,273,275,276,277, 31,184,190,193,198,211, & ! index 325 - 336
     224,234,268,272, 32,184,190,193,198,211,224,234, & ! index 337 - 348
     272,278, 33,272,273, 34,180,182,184,189,190,193 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_1 = (/ &
     198,211,224,234,266,272,276, 35,104,272, 36,112, & ! index 361 - 372
     272, 37,113,272, 38,111,115,127,131,138,146,149, & ! index 373 - 384
     153,154,155,158,159,165,166,171,173,175,176,187, & ! index 385 - 396
     188,189,191,195,197,200,201,202,207,209,210,212, & ! index 397 - 408
     213,214,216,217,218,219,220,221,222,223,230,231, & ! index 409 - 420
     232,233,234,235,238,240,241,242,243,244,245,247, & ! index 421 - 432
     248,249,250,252,253,254,255,256,257,258,260,262, & ! index 433 - 444
     263,266,267,268,270,272,273,274,275,276,277,278, & ! index 445 - 456
      39, 99,178,179,189,195,201,210,212,230,234,235, & ! index 457 - 468
     243,256,266,267,272,276, 40,121,139,141,142,169, & ! index 469 - 480
     178,179,180,182,185,194,196,207,208,214,217,218, & ! index 481 - 492
     231,232,233,235,242,244,248,255,258,266,267,270, & ! index 493 - 504
     271,272,275,276,277, 41,179,190,195,207,214,217, & ! index 505 - 516
     218,220,221,223,241,242,244,248,252,253,255,256, & ! index 517 - 528
     258,260,266,267,270,272,276,277, 42,112,113,272, & ! index 529 - 540
      43,104,272, 44, 82,272, 45,112,113,272, 46, 81, & ! index 541 - 552
     272, 47, 84,272, 48,144,145,272, 49,144,145,170, & ! index 553 - 564
     177,274,275, 50, 89,105,127,130,140,144,145,150, & ! index 565 - 576
     167,168,170,174,181,183,185,186,201,213,223,226, & ! index 577 - 588
     236,238,239,242,246,247,257,259,261,263,264,267, & ! index 589 - 600
     269,272,274,275,276, 51, 92, 99,104,112,113,145, & ! index 601 - 612
     149,152,160,175,178,186,188,212,238,242,243,247, & ! index 613 - 624
     266,267,270,272,275,276,277, 52, 92,112,113,146, & ! index 625 - 636
     149,152,154,159,160,161,179,186,193,195,198,210, & ! index 637 - 648
     212,216,217,221,222,242,244,247,249,253,256,257, & ! index 649 - 660
     262,266,267,268,270,272,274,276,277,278, 53,236, & ! index 661 - 672
      54,185,186,258,266, 55,194,217,241,248,258,266, & ! index 673 - 684
     267,270,272, 56,113,152,160,178,179,189,215,231, & ! index 685 - 696
     233,235,240,245,266,270,272,276,277, 57,128,137, & ! index 697 - 708
     138,172,190,207,218,241,248,254,258,260,262,266 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_2 = (/ &
     267,268,270,271,272,273,274,276,277,278, 58,144, & ! index 721 - 732
     272,275, 59,145,272,275, 60, 81,272, 61,130,272, & ! index 733 - 744
     275, 62, 82,272, 63, 83,272, 64,170,272,275,276, & ! index 745 - 756
      65,236,272,275, 66,132,272, 67,123,197,202,266, & ! index 757 - 768
     272, 68,112,113,144,272,275, 69,179,272,276, 70, & ! index 769 - 780
      83,272, 71, 84,272, 72,197,266, 73,110,272, 74, & ! index 781 - 792
     104,112,113,144,145,170,236,272,275,276, 75,178, & ! index 793 - 804
     272,276, 76, 85,272, 77, 86,272, 78, 86,272, 79, & ! index 805 - 816
      85,272, 80,120, 81, 82,272, 81, 82,272, 83, 84, & ! index 817 - 828
     272, 83, 84,272, 85, 86,272, 85, 86,272, 87,272, & ! index 829 - 840
      88,272, 89,164,199,208, 90,272, 91,209,230,267, & ! index 841 - 852
      92,152, 93,227, 94,265,274, 95,195,274, 96,240, & ! index 853 - 864
     274, 97,272, 98,120,227, 99,272,100,166,238,272, & ! index 865 - 876
     101,225,267,102,225,266,272,103,126,148,183,104, & ! index 877 - 888
     272, 91,105,201,209,210,222,230,238,267,271,106, & ! index 889 - 900
     153,165,201,272,107,153,165,201,272,108,266,272, & ! index 901 - 912
     277,109,191,267,272,110,197,266,272,111,270,274, & ! index 913 - 924
     112,272,113,272,114,126,148,183,227,250,115,272, & ! index 925 - 936
     276,116,187,257,272,274,275,117,272,273,118,272, & ! index 937 - 948
     273,119,250,272, 80, 93, 98,120,227,229,267,121, & ! index 949 - 960
     214,266,272,122,220,266,272,123,197,272,274,124, & ! index 961 - 972
     272,273,125,150,259,272,126,225,274,127,272,275, & ! index 973 - 984
     128,260,266,272,129,266,272,274,112,113,130,272, & ! index 985 - 996
     275,131,143,191,267,270,275,123,132,197,202,266, & ! index 997 - 1008
     272,274,119,133,229,250,270,272,273,126,134,225, & ! index 1009 - 1020
     236,267,272,274,135,227,229,250,272,136,187,272, & ! index 1021 - 1032
     274,277,137,215,240,266,272,138,218,266,272,139, & ! index 1033 - 1044
     207,266,272,140,272,273,275,141,233,235,266,272, & ! index 1045 - 1056
     142,185,186,258,266,272,143,191,266,270,272,112, & ! index 1057 - 1068
     113,144,272,275,104,145,272,275,146,221,241,266 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_3 = (/ &
     272,147,167,168,181,205,206,226,229,239,250,259, & ! index 1081 - 1092
     148,192,227,266,272,149,252,272,150,259,274,275, & ! index 1093 - 1104
     151,265,272,273,152,252,266,267,153,252,266,272, & ! index 1105 - 1116
     154,244,266,272,155,266,270,272,273,156,167,168, & ! index 1117 - 1128
     181,205,229,239,265,272,133,157,206,226,229,250, & ! index 1129 - 1140
     259,270,272,273,158,211,253,266,272,159,212,266, & ! index 1141 - 1152
     267,272,149,160,252,266,267,272,161,242,266,272, & ! index 1153 - 1164
     162,242,267,272,276,277,161,163,242,266,267,272, & ! index 1165 - 1176
     277,164,199,208,272,275,276,165,252,266,272,166, & ! index 1177 - 1188
     252,266,272,167,205,226,239,276,168,205,226,239, & ! index 1189 - 1200
     276,169,209,230,266,272,144,145,170,272,275,276, & ! index 1201 - 1212
     171,217,245,257,266,272,275,172,238,260,270,272, & ! index 1213 - 1224
     273,276,173,230,238,266,267,272,276,174,265,272, & ! index 1225 - 1236
     273,275,175,247,266,267,270,272,176,245,272,274, & ! index 1237 - 1248
     276,132,144,145,170,177,197,202,266,267,270,272, & ! index 1249 - 1260
     274,275,276,104,112,113,144,145,170,178,236,272, & ! index 1261 - 1272
     275,276,112,113,144,179,272,275,276,180,272,275, & ! index 1273 - 1284
     276,181,229,259,265,274,182,272,275,276,183,192, & ! index 1285 - 1296
     225,227,274,275,184,219,267,268,274,276,278,162, & ! index 1297 - 1308
     185,242,266,267,272,276,277,186,252,266,267,277, & ! index 1309 - 1320
     116,187,215,257,272,274,275,188,247,266,267,270, & ! index 1321 - 1332
     275,189,272,275,276,190,254,267,268,274,276,278, & ! index 1333 - 1344
     115,143,191,266,267,270,272,275,276,101,126,183, & ! index 1345 - 1356
     192,225,227,267,272,274,275,193,249,257,267,268, & ! index 1357 - 1368
     274,276,278,175,188,194,247,255,266,267,270,272, & ! index 1369 - 1380
     275, 95,195,222,266,267,272,274,196,207,214,218, & ! index 1381 - 1392
     220,223,231,233,235,241,242,244,248,252,253,258, & ! index 1393 - 1404
     270,272,110,123,130,197,266,267,270,272,274,275, & ! index 1405 - 1416
     198,262,267,268,274,276,278,199,231,232,235,266, & ! index 1417 - 1428
     267,270,272,275,277,104,112,113,144,145,170,200 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_4 = (/ &
     266,267,270,272,275,276,277,201,252,267,272,276, & ! index 1441 - 1452
     110,130,132,177,197,202,266,267,270,272,274,275, & ! index 1453 - 1464
     276,180,182,184,189,190,193,198,203,211,219,224, & ! index 1465 - 1476
     234,249,254,257,262,266,267,268,272,273,274,275, & ! index 1477 - 1488
     276,278, 99,178,179,189,195,201,204,210,212,222, & ! index 1489 - 1500
     230,234,235,236,243,252,256,266,267,272,273,274, & ! index 1501 - 1512
     275,276,156,167,168,181,205,226,229,239,259,265, & ! index 1513 - 1524
     266,272,274,276,119,125,135,150,157,206,226,227, & ! index 1525 - 1536
     229,239,250,259,266,270,272,273,274,275,139,207, & ! index 1537 - 1548
     254,266,267,270,272,275,277,208,231,232,233,235, & ! index 1549 - 1560
     266,267,270,272,275,276,277,169,201,209,230,252, & ! index 1561 - 1572
     266,267,272,276,201,209,210,230,244,252,266,267, & ! index 1573 - 1584
     272,276,211,219,267,268,274,276,278,100,106,107, & ! index 1585 - 1596
     153,165,166,201,212,238,252,266,267,272,276, 92, & ! index 1597 - 1608
      99,104,112,113,145,149,152,160,175,178,186,188, & ! index 1609 - 1620
     212,213,236,238,242,243,247,252,266,267,270,272, & ! index 1621 - 1632
     275,276,277,121,151,214,258,265,266,267,270,271, & ! index 1633 - 1644
     272,273,277,215,247,266,267,272,274,275,139,175, & ! index 1645 - 1656
     188,201,207,215,216,217,230,238,247,252,254,266, & ! index 1657 - 1668
     267,270,272,274,275,276,277,217,257,266,267,270, & ! index 1669 - 1680
     275,277,138,218,254,265,266,267,270,272,273,277, & ! index 1681 - 1692
     219,272,273,275,276,122,151,220,258,265,266,267, & ! index 1693 - 1704
     270,271,272,273,277,146,221,241,251,265,266,267, & ! index 1705 - 1716
     270,272,273,277,201,209,222,230,252,253,266,267, & ! index 1717 - 1728
     272,276,171,217,223,245,257,266,267,270,272,275, & ! index 1729 - 1740
     277,170,178,179,224,236,249,267,268,272,274,275, & ! index 1741 - 1752
     276,278,  1,  2,  3, 90, 93,101,102,103,114,120, & ! index 1753 - 1764
     126,148,183,192,225,227,229,250,266,267,272,274, & ! index 1765 - 1776
     275,276,167,168,205,226,229,239,250,259,265,266, & ! index 1777 - 1788
     272,273,274,276, 93, 98,120,148,183,192,225,227 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_5 = (/ &
     229,250,266,267,272,274,275,276, 89,105,127,130, & ! index 1801 - 1812
     140,144,145,150,164,167,168,170,174,181,183,185, & ! index 1813 - 1824
     186,192,199,201,205,208,209,210,213,222,223,225, & ! index 1825 - 1836
     226,227,228,229,230,231,232,233,235,236,238,239, & ! index 1837 - 1848
     242,243,244,245,246,247,250,252,253,257,259,261, & ! index 1849 - 1860
     263,264,265,266,267,269,270,271,272,273,274,275, & ! index 1861 - 1872
     276,277,181,225,227,229,250,259,265,266,267,272, & ! index 1873 - 1884
     274,275,276,169,209,230,238,252,266,267,272,276, & ! index 1885 - 1896
     180,182,189,231,232,266,267,270,272,275,276,277, & ! index 1897 - 1908
     180,182,189,231,232,266,267,270,272,275,276,277, & ! index 1909 - 1920
     189,233,266,267,270,272,275,276,277,115,219,234, & ! index 1921 - 1932
     254,257,262,267,268,272,273,274,275,276,278,180, & ! index 1933 - 1944
     182,235,266,267,270,272,275,276,277,144,145,170, & ! index 1945 - 1956
     177,197,202,236,266,267,270,272,274,275,276,179, & ! index 1957 - 1968
     190,195,207,214,217,218,220,221,222,223,230,237, & ! index 1969 - 1980
     238,241,242,244,245,248,251,252,253,254,255,256, & ! index 1981 - 1992
     257,258,260,265,266,267,268,270,271,272,273,274, & ! index 1993 - 2004
     275,276,277,278,238,252,255,267,270,272,276,151, & ! index 2005 - 2016
     174,205,206,226,227,229,239,250,251,254,259,261, & ! index 2017 - 2028
     263,265,266,267,270,272,273,274,275,276, 96,137, & ! index 2029 - 2040
     178,179,215,236,240,247,262,264,266,267,269,270, & ! index 2041 - 2052
     272,274,275,276,277,180,182,189,241,266,267,269, & ! index 2053 - 2064
     270,272,275,276,277,161,165,166,242,249,252,266, & ! index 2065 - 2076
     267,270,272,277,109,131,143,149,154,161,186,191, & ! index 2077 - 2088
     209,210,212,224,230,236,238,242,243,244,247,249, & ! index 2089 - 2100
     252,255,266,267,268,270,272,274,275,276,277,278, & ! index 2101 - 2112
     154,219,244,262,266,267,270,272,273,275,276,277, & ! index 2113 - 2124
     171,176,217,245,257,266,267,270,272,274,275,276, & ! index 2125 - 2136
     277, 92,112,113,146,149,152,154,159,160,161,179, & ! index 2137 - 2148
     186,193,195,198,210,212,216,217,221,222,230,238 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_6 = (/ &
     241,242,244,246,247,249,251,252,253,254,255,256, & ! index 2161 - 2172
     257,262,265,266,267,268,269,270,272,273,274,275, & ! index 2173 - 2184
     276,277,278,247,255,267,270,272,275,276,277,169, & ! index 2185 - 2196
     209,230,236,238,248,252,255,266,267,270,271,272, & ! index 2197 - 2208
     274,275,276,277,153,165,166,201,238,249,252,255, & ! index 2209 - 2220
     266,267,270,272,275,276,277,119,133,135,206,226, & ! index 2221 - 2232
     227,229,239,250,251,254,259,260,261,263,265,266, & ! index 2233 - 2244
     267,270,272,273,274,275,276,122,220,235,251,258, & ! index 2245 - 2256
     265,266,267,270,271,272,273,275,276,277,153,165, & ! index 2257 - 2268
     166,219,252,266,267,270,272,273,275,276,277,158, & ! index 2269 - 2280
     211,219,253,257,266,267,268,270,272,273,274,275, & ! index 2281 - 2292
     276,277,278,189,219,233,254,262,265,266,267,270, & ! index 2293 - 2304
     272,273,275,276,277,194,219,247,255,266,267,270, & ! index 2305 - 2316
     272,273,275,276,277,138,149,158,161,163,164,176, & ! index 2317 - 2328
     186,187,195,199,208,209,211,212,215,218,219,221, & ! index 2329 - 2340
     222,223,224,230,231,232,233,235,236,238,241,242, & ! index 2341 - 2352
     245,247,249,251,252,253,254,255,256,257,258,262, & ! index 2353 - 2364
     265,266,267,268,269,270,271,272,273,274,275,276, & ! index 2365 - 2376
     277,278,153,165,166,189,211,219,233,252,255,257, & ! index 2377 - 2388
     266,267,268,270,272,273,274,275,276,277,278,140, & ! index 2389 - 2400
     141,142,179,185,186,233,235,242,248,249,252,255, & ! index 2401 - 2412
     258,266,267,270,271,272,273,274,275,276,277,117, & ! index 2413 - 2424
     118,124,140,150,151,155,172,174,181,203,204,205, & ! index 2425 - 2436
     206,210,211,212,219,222,224,226,227,229,230,234, & ! index 2437 - 2448
     235,236,237,238,239,241,242,243,244,245,247,248, & ! index 2449 - 2460
     249,250,251,252,253,254,255,256,257,258,259,260, & ! index 2461 - 2472
     261,262,263,265,266,267,268,269,270,271,272,273, & ! index 2473 - 2484
     274,275,276,277,278,128,174,189,240,247,255,258, & ! index 2485 - 2496
     260,262,264,265,266,267,269,270,271,272,273,274, & ! index 2497 - 2508
     275,276,277,111,115,127,131,138,143,146,149,153 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_7 = (/ &
     154,155,158,159,165,166,171,173,175,176,187,188, & ! index 2521 - 2532
     189,191,195,197,200,201,202,207,209,210,211,212, & ! index 2533 - 2544
     213,214,215,216,217,218,219,220,221,222,223,230, & ! index 2545 - 2556
     231,232,233,234,235,236,238,240,241,242,243,244, & ! index 2557 - 2568
     245,247,248,249,250,251,252,253,254,255,256,257, & ! index 2569 - 2580
     258,259,260,261,262,263,264,265,266,267,268,269, & ! index 2581 - 2592
     270,271,272,273,274,275,276,277,278,153,165,166, & ! index 2593 - 2604
     179,184,219,252,255,262,266,267,268,270,272,273, & ! index 2605 - 2616
     274,275,276,277,278,128,137,138,172,190,207,215, & ! index 2617 - 2628
     218,238,240,241,247,248,252,254,255,258,260,262, & ! index 2629 - 2640
     263,264,265,266,267,268,269,270,271,272,273,274, & ! index 2641 - 2652
     275,276,277,278,121,139,141,142,169,178,179,180, & ! index 2653 - 2664
     182,185,186,194,196,207,208,209,214,217,218,220, & ! index 2665 - 2676
     223,230,231,232,233,235,236,238,241,242,244,245, & ! index 2677 - 2688
     247,248,249,252,253,254,255,257,258,262,264,265, & ! index 2689 - 2700
     266,267,268,269,270,271,272,273,274,275,276,277, & ! index 2701 - 2712
     278,  3, 87, 88, 94, 97,103,126,147,148,151,156, & ! index 2713 - 2724
     167,168,174,181,183,192,205,206,225,226,227,229, & ! index 2725 - 2736
     239,250,251,254,258,259,260,261,262,263,264,265, & ! index 2737 - 2748
     266,267,268,269,270,271,272,273,274,275,276,277, & ! index 2749 - 2760
     278, 97, 99,104,111,112,113,117,118,121,122,124, & ! index 2761 - 2772
     128,129,130,131,137,138,139,141,142,143,144,145, & ! index 2773 - 2784
     149,152,153,154,155,158,159,160,161,162,163,165, & ! index 2785 - 2796
     166,169,170,172,173,175,178,179,180,182,185,186, & ! index 2797 - 2808
     187,188,189,191,194,195,196,197,200,201,202,203, & ! index 2809 - 2820
     204,207,209,210,211,212,213,214,215,217,218,219, & ! index 2821 - 2832
     220,221,222,223,224,225,227,229,230,231,232,233, & ! index 2833 - 2844
     234,235,236,238,240,241,242,243,244,245,246,247, & ! index 2845 - 2856
     248,249,250,251,252,253,254,255,256,257,258,259, & ! index 2857 - 2868
     260,261,262,263,264,265,266,267,268,269,270,271 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_8 = (/ &
     272,273,274,275,276,277,278,101,120,134,152,160, & ! index 2881 - 2892
     175,184,185,186,188,190,191,193,195,197,198,200, & ! index 2893 - 2904
     202,207,209,211,212,214,215,217,218,219,220,221, & ! index 2905 - 2916
     222,223,224,225,227,229,230,231,232,233,234,235, & ! index 2917 - 2928
     236,238,240,241,242,244,245,247,248,249,250,251, & ! index 2929 - 2940
     252,253,254,255,257,258,259,260,261,262,263,264, & ! index 2941 - 2952
     265,266,267,268,269,270,271,272,273,274,275,276, & ! index 2953 - 2964
     277,278, 99,104,112,113,117,118,124,130,149,152, & ! index 2965 - 2976
     158,159,161,163,173,176,178,179,180,182,184,187, & ! index 2977 - 2988
     189,190,193,198,201,211,212,213,215,216,217,219, & ! index 2989 - 3000
     222,224,230,234,236,238,242,243,244,245,246,247, & ! index 3001 - 3012
     249,251,252,253,254,255,256,257,258,261,262,263, & ! index 3013 - 3024
     264,265,266,267,268,269,270,271,272,273,274,275, & ! index 3025 - 3036
     276,277,278,141,154,162,163,180,182,194,199,223, & ! index 3037 - 3048
     231,232,233,235,241,242,244,245,247,249,252,253, & ! index 3049 - 3060
     255,257,258,262,266,267,268,269,270,271,272,273, & ! index 3061 - 3072
     274,275,276,277,278, 90, 97,108,111,124,127,136, & ! index 3073 - 3084
     155,175,187,188,191,197,198,200,202,207,214,215, & ! index 3085 - 3096
     216,217,218,219,220,221,223,230,231,232,233,235, & ! index 3097 - 3108
     237,238,240,241,242,244,245,247,248,249,250,251, & ! index 3109 - 3120
     252,253,254,255,256,257,258,259,260,261,262,263, & ! index 3121 - 3132
     264,265,266,267,268,269,270,271,272,273,274,275, & ! index 3133 - 3144
     276,277,278,194,217,241,247,248,252,255,257,258, & ! index 3145 - 3156
     266,267,268,269,270,271,272,273,274,275,276,277, & ! index 3157 - 3168
     278, 87, 88, 90, 92, 97, 99,100,102,104,106,107, & ! index 3169 - 3180
     108,109,110,112,113,115,117,118,119,121,122,123, & ! index 3181 - 3192
     124,125,127,128,129,130,132,134,135,137,138,139, & ! index 3193 - 3204
     140,141,142,143,144,145,146,148,149,150,151,152, & ! index 3205 - 3216
     153,154,155,156,157,158,159,160,161,162,163,164, & ! index 3217 - 3228
     165,166,167,168,169,170,171,172,173,174,176,178 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_9 = (/ &
     179,180,181,182,185,186,187,189,191,192,194,195, & ! index 3241 - 3252
     196,197,199,200,201,202,203,204,205,206,207,208, & ! index 3253 - 3264
     209,210,211,212,213,214,215,216,217,218,219,220, & ! index 3265 - 3276
     221,222,223,224,225,226,227,228,229,230,231,232, & ! index 3277 - 3288
     233,234,235,236,237,238,239,240,241,242,243,244, & ! index 3289 - 3300
     245,246,247,248,249,250,251,252,253,254,255,256, & ! index 3301 - 3312
     257,258,259,260,261,262,263,264,265,266,267,268, & ! index 3313 - 3324
     269,270,271,272,273,274,275,276,277,278,  2,114, & ! index 3325 - 3336
     117,118,119,124,125,126,133,140,147,148,150,151, & ! index 3337 - 3348
     155,157,167,168,172,174,181,183,192,203,204,205, & ! index 3349 - 3360
     206,210,211,212,219,222,224,225,226,227,229,230, & ! index 3361 - 3372
     234,235,236,237,238,239,241,242,243,244,245,247, & ! index 3373 - 3384
     248,249,250,251,252,253,254,255,256,257,258,259, & ! index 3385 - 3396
     260,261,262,263,264,265,266,267,268,269,270,271, & ! index 3397 - 3408
     272,273,274,275,276,277,278, 94, 95, 96,109,111, & ! index 3409 - 3420
     116,120,123,125,126,129,134,136,139,150,152,160, & ! index 3421 - 3432
     164,169,173,176,177,181,183,184,185,186,187,188, & ! index 3433 - 3444
     190,191,192,193,194,195,197,198,199,200,201,202, & ! index 3445 - 3456
     207,208,209,210,211,212,214,215,216,217,218,219, & ! index 3457 - 3468
     220,221,222,223,224,225,226,227,228,229,230,231, & ! index 3469 - 3480
     232,233,234,235,236,238,239,240,241,242,243,244, & ! index 3481 - 3492
     245,246,247,248,249,250,251,252,253,254,255,256, & ! index 3493 - 3504
     257,258,259,260,261,262,263,264,265,266,267,268, & ! index 3505 - 3516
     269,270,271,272,273,274,275,276,277,278,111,127, & ! index 3517 - 3528
     129,130,136,140,144,145,150,164,170,174,176,180, & ! index 3529 - 3540
     181,182,183,184,187,188,189,190,191,192,193,195, & ! index 3541 - 3552
     198,199,200,202,208,210,211,213,215,219,222,224, & ! index 3553 - 3564
     225,226,227,228,229,230,231,232,233,234,235,236, & ! index 3565 - 3576
     238,239,242,243,244,245,246,247,249,250,251,252, & ! index 3577 - 3588
     253,254,255,256,257,258,259,260,261,262,263,264 /)
  INTEGER, PARAMETER, DIMENSION(170) :: LU_ICOL_10 = (/ &
     265,266,267,268,269,270,271,272,273,274,275,276, & ! index 3601 - 3612
     277,278,115,135,162,167,168,170,176,177,178,179, & ! index 3613 - 3624
     180,182,189,197,201,202,205,208,215,219,225,226, & ! index 3625 - 3636
     227,229,231,232,233,235,236,238,239,240,242,245, & ! index 3637 - 3648
     247,249,250,251,252,254,255,257,258,259,260,261, & ! index 3649 - 3660
     262,263,264,265,266,267,268,269,270,271,272,273, & ! index 3661 - 3672
     274,275,276,277,278,108,136,146,149,154,159,171, & ! index 3673 - 3684
     176,187,198,200,207,210,212,214,215,217,218,219, & ! index 3685 - 3696
     220,221,223,230,231,232,233,235,238,240,241,242, & ! index 3697 - 3708
     244,245,246,247,248,249,251,252,253,254,255,256, & ! index 3709 - 3720
     257,258,260,262,263,264,265,266,267,268,269,270, & ! index 3721 - 3732
     271,272,273,274,275,276,277,278,127,184,190,193, & ! index 3733 - 3744
     198,211,219,224,234,236,249,252,254,255,257,262, & ! index 3745 - 3756
     265,266,267,268,269,270,271,272,273,274,275,276, & ! index 3757 - 3768
     277,278 /)
  INTEGER, PARAMETER, DIMENSION(3770) :: LU_ICOL = (/&
    LU_ICOL_0, LU_ICOL_1, LU_ICOL_2, LU_ICOL_3, LU_ICOL_4, &
    LU_ICOL_5, LU_ICOL_6, LU_ICOL_7, LU_ICOL_8, LU_ICOL_9, &
    LU_ICOL_10 /)

  INTEGER, PARAMETER, DIMENSION(279) :: LU_CROW = (/ &
       1,  2,  3,  4,  9, 42, 45, 53, 61, 63, 72, 75, & ! index 1 - 12
      78, 80, 85, 88, 90, 93,103,105,107,109,113,115, & ! index 13 - 24
     118,120,123,126,199,275,331,341,351,354,368,371, & ! index 25 - 36
     374,377,457,475,510,537,541,544,547,551,554,557, & ! index 37 - 48
     561,568,606,632,671,673,678,688,706,731,735,739, & ! index 49 - 60
     742,746,749,752,757,761,764,770,776,780,783,786, & ! index 61 - 72
     789,792,803,807,810,813,816,819,821,824,827,830, & ! index 73 - 84
     833,836,839,841,843,847,849,853,855,857,860,863, & ! index 85 - 96
     866,868,871,873,877,880,884,888,890,900,905,910, & ! index 97 - 108
     914,918,922,925,927,929,935,938,944,947,950,953, & ! index 109 - 120
     960,964,968,972,975,979,982,985,989,993,998,1004, & ! index 121 - 132
     1011,1018,1025,1030,1035,1040,1044,1048,1052,1057,1063,1068, & ! index 133 - 144
     1073,1077,1082,1093,1098,1101,1105,1109,1113,1117,1121,1126, & ! index 145 - 156
     1135,1145,1150,1155,1161,1165,1171,1178,1184,1188,1192,1197, & ! index 157 - 168
     1202,1207,1213,1220,1227,1234,1239,1245,1250,1264,1275,1282, & ! index 169 - 180
     1286,1291,1295,1301,1308,1316,1321,1328,1334,1338,1345,1354, & ! index 181 - 192
     1364,1372,1382,1389,1407,1417,1424,1434,1448,1453,1466,1491, & ! index 193 - 204
     1515,1529,1547,1556,1568,1577,1587,1594,1608,1636,1648,1655, & ! index 205 - 216
     1676,1683,1693,1698,1710,1721,1731,1742,1755,1779,1793,1809, & ! index 217 - 228
     1875,1888,1897,1909,1921,1930,1944,1954,1968,2009,2016,2039, & ! index 229 - 240
     2058,2070,2081,2113,2125,2138,2188,2196,2213,2228,2252,2267, & ! index 241 - 252
     2280,2296,2310,2322,2379,2400,2424,2490,2512,2602,2622,2657, & ! index 253 - 264
     2714,2762,2888,2967,3040,3078,3148,3170,3335,3416,3527,3615, & ! index 265 - 276
     3678,3741,3771 /)

  INTEGER, PARAMETER, DIMENSION(279) :: LU_DIAG = (/ &
       1,  2,  3,  4,  9, 42, 45, 53, 61, 63, 72, 75, & ! index 1 - 12
      78, 80, 85, 88, 90, 93,103,105,107,109,113,115, & ! index 13 - 24
     118,120,123,126,199,275,331,341,351,354,368,371, & ! index 25 - 36
     374,377,457,475,510,537,541,544,547,551,554,557, & ! index 37 - 48
     561,568,606,632,671,673,678,688,706,731,735,739, & ! index 49 - 60
     742,746,749,752,757,761,764,770,776,780,783,786, & ! index 61 - 72
     789,792,803,807,810,813,816,819,821,825,827,831, & ! index 73 - 84
     833,837,839,841,843,847,849,853,855,857,860,863, & ! index 85 - 96
     866,868,871,873,877,880,884,888,891,900,905,910, & ! index 97 - 108
     914,918,922,925,927,929,935,938,944,947,950,956, & ! index 109 - 120
     960,964,968,972,975,979,982,985,989,995,998,1005, & ! index 121 - 132
     1012,1019,1025,1030,1035,1040,1044,1048,1052,1057,1063,1070, & ! index 133 - 144
     1074,1077,1082,1093,1098,1101,1105,1109,1113,1117,1121,1126, & ! index 145 - 156
     1136,1145,1150,1156,1161,1165,1172,1178,1184,1188,1192,1197, & ! index 157 - 168
     1202,1209,1213,1220,1227,1234,1239,1245,1254,1270,1278,1282, & ! index 169 - 180
     1286,1291,1295,1301,1309,1316,1322,1328,1334,1338,1347,1357, & ! index 181 - 192
     1364,1374,1383,1389,1410,1417,1424,1440,1448,1458,1473,1497, & ! index 193 - 204
     1519,1534,1548,1556,1570,1579,1587,1601,1622,1638,1648,1661, & ! index 205 - 216
     1676,1684,1693,1700,1711,1723,1733,1745,1769,1782,1800,1839, & ! index 217 - 228
     1878,1890,1900,1913,1922,1932,1946,1960,1980,2009,2023,2045, & ! index 229 - 240
     2061,2073,2097,2115,2128,2164,2188,2201,2218,2236,2255,2271, & ! index 241 - 252
     2283,2299,2313,2361,2388,2413,2471,2497,2584,2610,2641,2699, & ! index 253 - 264
     2748,2875,2955,3029,3068,3139,3162,3328,3410,3522,3611,3675, & ! index 265 - 276
     3739,3770,3771 /)


END MODULE gckpp_JacobianSP

